home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / avault1a / form2.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1999-08-16  |  2.7 KB  |  86 lines
  1. VERSION 5.00
  2. Begin VB.Form Form2 
  3.    AutoRedraw      =   -1  'True
  4.    BackColor       =   &H00000000&
  5.    BorderStyle     =   3  'Fixed Dialog
  6.    ClientHeight    =   2910
  7.    ClientLeft      =   45
  8.    ClientTop       =   45
  9.    ClientWidth     =   9210
  10.    ControlBox      =   0   'False
  11.    LinkTopic       =   "Form2"
  12.    MaxButton       =   0   'False
  13.    MinButton       =   0   'False
  14.    ScaleHeight     =   2910
  15.    ScaleWidth      =   9210
  16.    ShowInTaskbar   =   0   'False
  17.    StartUpPosition =   2  'CenterScreen
  18.    Begin VB.CommandButton Command2 
  19.       Caption         =   "Read This"
  20.       Height          =   510
  21.       Left            =   7965
  22.       TabIndex        =   2
  23.       Top             =   1755
  24.       Width           =   1230
  25.    End
  26.    Begin VB.CommandButton Command1 
  27.       Caption         =   "Continue"
  28.       Height          =   510
  29.       Left            =   7965
  30.       TabIndex        =   0
  31.       Top             =   2385
  32.       Width           =   1230
  33.    End
  34.    Begin VB.Label Label3 
  35.       BackStyle       =   0  'Transparent
  36.       Caption         =   $"Form2.frx":0000
  37.       ForeColor       =   &H00FFFFFF&
  38.       Height          =   420
  39.       Left            =   45
  40.       TabIndex        =   4
  41.       Top             =   2475
  42.       Width           =   7710
  43.    End
  44.    Begin VB.Label Label2 
  45.       BackStyle       =   0  'Transparent
  46.       Caption         =   "Programmed by: FXProduction's  vbguihead@aol.com"
  47.       ForeColor       =   &H00FFFFFF&
  48.       Height          =   285
  49.       Left            =   2430
  50.       TabIndex        =   3
  51.       Top             =   1395
  52.       Width           =   4200
  53.    End
  54.    Begin VB.Label Label1 
  55.       BackColor       =   &H00000000&
  56.       BackStyle       =   0  'Transparent
  57.       Caption         =   "Adrenaline Vault WebBrowser"
  58.       BeginProperty Font 
  59.          Name            =   "MS Sans Serif"
  60.          Size            =   24
  61.          Charset         =   0
  62.          Weight          =   400
  63.          Underline       =   0   'False
  64.          Italic          =   0   'False
  65.          Strikethrough   =   0   'False
  66.       EndProperty
  67.       ForeColor       =   &H00FFFFFF&
  68.       Height          =   600
  69.       Left            =   585
  70.       TabIndex        =   1
  71.       Top             =   720
  72.       Width           =   6990
  73.    End
  74. Attribute VB_Name = "Form2"
  75. Attribute VB_GlobalNameSpace = False
  76. Attribute VB_Creatable = False
  77. Attribute VB_PredeclaredId = True
  78. Attribute VB_Exposed = False
  79. Private Sub Command1_Click()
  80. Form1.Show
  81. Unload Me
  82. End Sub
  83. Private Sub Command2_Click()
  84. MsgBox "you can E-Mail vbguihead@aol.com if you like this program, give him compliments. If you ask nice he might make one for you!. Thanks for using!"
  85. End Sub
  86.